program pr;
var 
x: entero;
y: real;
z: boolean;

function fun (var i:integer; j:real; var k:boolean):integer;
begin 
i:=6;
end;

function fun2 (var l:integer):integer;
begin
l:=6;
fun2:=1;
end;

begin
if (x>4) then 
x:=5;
else
x:=6;

end.

